From: Po Lu Date: Mon, 29 Nov 2021 09:19:27 +0000 (+0800) Subject: Fix last change for non-X platforms X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~16^2~4088^2~2 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=4320180111422ad803f26a30e616f1f18efedb65;p=emacs.git Fix last change for non-X platforms * lisp/cus-start.el: Don't announce `scroll-bar-adjust-thumb-portion' on non-X systems. --- diff --git a/lisp/cus-start.el b/lisp/cus-start.el index e895ebd5692..45b81e5bc5f 100644 --- a/lisp/cus-start.el +++ b/lisp/cus-start.el @@ -877,8 +877,10 @@ since it could result in memory overflow and make Emacs crash." (symbol-name symbol)) ;; Any function from fontset.c will do. (fboundp 'new-fontset)) - ((equal "scroll-bar-adjust-thumb-portion" - (symbol-name symbol)) + ((or (equal "scroll-bar-adjust-thumb-portion" + (symbol-name symbol)) + (equal "x-scroll-event-delta-factor" + (symbol-name symbol))) (featurep 'x)) (t t)))) (if (not (boundp symbol))